哪位好心人能帮我 [Microsoft][ODBC Microsoft Access Driver] 参数不足，期待是 1

来源：百度知道编辑：UC知道时间：2024/06/24 05:50:00

全部错误
Microsoft VBScript 编译器错误错误 '800a03f6'

缺少 'End'

/iisHelp/common/500-100.asp，行242

Microsoft OLE DB Provider for ODBC Drivers 错误 '80040e10'

[Microsoft][ODBC Microsoft Access Driver] 参数不足，期待是 1。

/index.asp，行11
全部代码
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>

<%

set Command1 = Server.CreateObject("ADODB.Command")
Command1.ActiveConnection = MM_web_STRING
Command1.CommandText = "UPDATE 计数 SET jishu=jishu+1 WHERE id=zs "
Command1.CommandType = 1
Command1.CommandTimeout = 0
Command1.Prepared = true
Command1.Execute()

%>
<%
Dim Recordset1
Dim Recordset1_numRows

Set Recordset1 = Server.CreateObject("ADODB.Recordset")
Recordset1.ActiveConnection = MM_web_STRING
Recordset1.Sou

<%
set conn=Server.CreateObject("ADODB.Connection")
conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq="&Server.MapPath("Member.mdb")
set rs=Server.CreateObject("ADODB.Recordset")
%>
<%
dim name1,pass
name1=trim(request.form("name"))
pass=trim(request.form("pass"))
if name1<>"" then
sql="select * from admin where name='"+name1+"' and pass='"+pass+"'"
rs.open sql,conn,1,1
if rs.recordcount=0 then
response.redirect "login.asp?msg=用户名或密码有误！"
else
response.redirect "main.html"
end if
end if

%>
<form id="form1" name="form1" method="post" action="default.asp">
<table width="257" border="1" align="center" bgcolor="#ffffcf"

哪位好心人能帮我？哪位好心人能帮我解答一下, 哪位好心人能帮我分析一下？急用，哪位好心人能帮我翻译？哪位好心人能帮我翻译一下？哪位好心人能帮我解答这道题哪位好心人帮我? 哪位好心人帮我自考哪位好心人能帮帮我市场营销！急用！谢谢！！哪位好心人能帮我解梦，我很害怕！！！